UPDATE LUX_FATTURA FA 
SET FA.STORNO = 'S',
fa.protocollo_storno ='NL',
fa.num_storno = null,
FA.DT_EMISSIONE_STORNO = to_date (^Data emissione storni gg/mm/aaaa ;A;Alfabetico^^,'dd/mm/yyyy'),
FA.ANNO_STORNO = substr(^Data emissione storni gg/mm/aaaa ;A;Alfabetico;1^^,7,4) 
where
 STORNO IS null
and trim(FA.ANNO_FAT) = ^ANNO_FATTURA aaaa;N;Numerico^^
AND   trim(FA.NUM_FAT) = ^Numero Fattura aaaa;N;Numerico^^
and   concat(trim(FA.ANNO_FAT),trim(FA.NUM_FAT)) not in 
(select concat(trim(ANNO_FAT),trim(NUM_FAT)) from lux_incasso)




